Purpose

Return the total count of the number of local DATA items that can be read with the READ$ function.

Syntax

Count% = DATACOUNT

Remarks

DATACOUNT only returns the number of DATA items in the Sub, Function, Method, or Property in which it appears (i.e., local DATA statements). While it is not possible to directly read data from outside of the scope of current procedure, global data can be emulated easily by placing it inside a procedure returns data to the calling code. There is a limit of 64 Kilobytes and 16384 separate data items per procedure.

See also

DATA, READ$

Example

FUNCTION GetCategories(Category() AS STRING) AS LONG

 LOCAL x AS INTEGER

 REDIM Category(1 TO DATACOUNT) AS STRING

 FOR x = 1 TO DATACOUNT

   Category(x) = READ$(x)

 NEXT x

 FUNCTION = DATACOUNT

 DATA Animal, Mineral, Vegetable, Alien

END FUNCTION